/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / sillies / _flasher / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 05 f4 0d 00 1e | 1b f4 20 20 42 79 20 4d |........|..  By M|
|00000020| 65 72 6c 79 6e 20 4b 6c | 69 6e 65 20 31 39 39 30 |erlyn Kl|ine 1990|
|00000030| 0d 00 28 18 3a 20 20 20 | 20 76 65 72 73 69 6f 6e |..(.:   | version|
|00000040| 24 3d 22 31 2e 30 34 22 | 0d 00 32 04 0d 00 3c 17 |$="1.04"|..2...<.|
|00000050| ee 85 3a f2 65 72 72 6f | 72 28 9f 2c f6 24 2c 9e |..:.erro|r(.,.$,.|
|00000060| 2c b9 29 0d 00 46 09 f2 | 69 6e 69 74 0d 00 50 17 |,.)..F..|init..P.|
|00000070| ee 85 3a f2 65 72 72 6f | 72 28 9f 2c f6 24 2c 9e |..:.erro|r(.,.$,.|
|00000080| 2c a3 29 0d 00 5a 04 0d | 00 64 05 f5 0d 00 6e 35 |,.)..Z..|.d....n5|
|00000090| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 49 64 6c |.. "Wimp|_PollIdl|
|000000a0| 65 22 2c 25 31 30 30 31 | 31 30 30 30 30 2c 71 25 |e",%1001|10000,q%|
|000000b0| 2c 64 65 6c 61 79 25 20 | b8 20 72 65 61 73 6f 6e |,delay% |. reason|
|000000c0| 25 0d 00 78 15 f2 72 65 | 73 70 6f 6e 64 28 72 65 |%..x..re|spond(re|
|000000d0| 61 73 6f 6e 25 29 0d 00 | 82 0a fd 71 75 69 74 25 |ason%)..|...quit%|
|000000e0| 0d 00 8c 09 f2 71 75 69 | 74 0d 00 96 05 e0 0d 00 |.....qui|t.......|
|000000f0| a0 04 0d 00 aa 16 dd f2 | 72 65 73 70 6f 6e 64 28 |........|respond(|
|00000100| 72 65 61 73 6f 6e 25 29 | 0d 00 b4 0e c8 8e 72 65 |reason%)|......re|
|00000110| 61 73 6f 6e 25 ca 0d 00 | be 10 c9 20 30 3a f2 62 |ason%...|... 0:.b|
|00000120| 61 63 6b 67 6e 64 0d 00 | c8 08 c9 20 31 3a 0d 00 |ackgnd..|... 1:..|
|00000130| d2 20 c9 20 32 3a c8 99 | 20 22 57 69 6d 70 5f 4f |. . 2:..| "Wimp_O|
|00000140| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 71 25 0d 00 |penWindo|w",,q%..|
|00000150| dc 1a c9 20 33 3a f2 63 | 6c 6f 73 65 5f 77 69 6e |... 3:.c|lose_win|
|00000160| 64 6f 77 28 21 71 25 29 | 0d 00 e6 08 c9 20 34 3a |dow(!q%)|..... 4:|
|00000170| 0d 00 f0 08 c9 20 35 3a | 0d 00 fa 2f c9 20 36 3a |..... 5:|.../. 6:|
|00000180| f2 6d 6f 75 73 65 28 21 | 71 25 2c 71 25 21 34 2c |.mouse(!|q%,q%!4,|
|00000190| 71 25 21 38 2c 71 25 21 | 31 32 2c 71 25 21 31 36 |q%!8,q%!|12,q%!16|
|000001a0| 2c 71 25 21 32 30 29 0d | 01 04 07 c9 20 37 0d 01 |,q%!20).|.... 7..|
|000001b0| 0e 08 c9 20 38 3a 0d 01 | 18 13 c9 20 39 3a f2 6d |... 8:..|... 9:.m|
|000001c0| 65 6e 75 73 65 6c 65 63 | 74 0d 01 22 07 c9 31 30 |enuselec|t.."..10|
|000001d0| 0d 01 2c 07 c9 31 31 0d | 01 36 07 c9 31 32 0d 01 |..,..11.|.6..12..|
|000001e0| 40 12 c9 31 37 2c 31 38 | 3a f2 75 6d 65 73 73 31 |@..17,18|:.umess1|
|000001f0| 0d 01 4a 05 cb 0d 01 54 | 05 e1 0d 01 5e 04 0d 01 |..J....T|....^...|
|00000200| 68 0a dd f2 71 75 69 74 | 0d 01 72 0d f2 72 65 73 |h...quit|..r..res|
|00000210| 74 6f 72 65 63 0d 01 7c | 32 24 71 25 3d 22 54 41 |torec..||2$q%="TA|
|00000220| 53 4b 22 3a c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |SK":.. "|Wimp_Clo|
|00000230| 73 65 44 6f 77 6e 22 2c | 74 61 73 6b 68 61 6e 64 |seDown",|taskhand|
|00000240| 6c 65 25 2c 21 71 25 0d | 01 86 05 e0 0d 01 90 05 |le%,!q%.|........|
|00000250| e1 0d 01 9a 04 0d 01 a4 | 0a dd f2 69 6e 69 74 0d |........|...init.|
|00000260| 01 ae 0e de 20 76 61 6c | 25 20 31 30 30 0d 01 b8 |.... val|% 100...|
|00000270| 13 61 70 70 6c 69 63 61 | 74 69 6f 6e 24 3d 22 22 |.applica|tion$=""|
|00000280| 0d 01 c2 11 6c 61 73 74 | 70 61 72 61 6d 24 3d 22 |....last|param$="|
|00000290| 22 0d 01 cc 0f 71 73 69 | 7a 65 25 3d 31 30 30 30 |"....qsi|ze%=1000|
|000002a0| 0d 01 d6 1c de 20 71 25 | 20 71 73 69 7a 65 25 2c |..... q%| qsize%,|
|000002b0| 77 6f 72 6b 62 75 66 25 | 20 34 30 30 0d 01 e0 13 |workbuf%| 400....|
|000002c0| 61 70 70 6c 24 3d 22 46 | 6c 61 73 68 65 72 22 0d |appl$="F|lasher".|
|000002d0| 01 ea 43 e7 a4 69 6e 69 | 74 77 69 6d 70 3c 32 30 |..C..ini|twimp<20|
|000002e0| 30 85 39 39 2c 22 54 68 | 69 73 20 41 70 70 6c 69 |0.99,"Th|is Appli|
|000002f0| 63 61 74 69 6f 6e 20 72 | 65 71 75 69 72 65 73 20 |cation r|equires |
|00000300| 57 69 6d 70 20 32 30 30 | 20 6f 72 20 6c 61 74 65 |Wimp 200| or late|
|00000310| 72 22 0d 01 f4 0c 2a 66 | 78 32 32 39 2c 31 0d 01 |r"....*f|x229,1..|
|00000320| fe 0b 71 75 69 74 25 3d | a3 0d 02 08 0c 64 65 6c |..quit%=|.....del|
|00000330| 61 79 25 3d 30 0d 02 12 | 1c 66 6c 61 73 68 69 6e |ay%=0...|.flashin|
|00000340| 67 25 3d b9 3a 66 69 6e | 64 63 61 72 65 74 25 3d |g%=.:fin|dcaret%=|
|00000350| a3 0d 02 1c 0f 6f 66 66 | 74 69 6d 65 25 3d 32 30 |.....off|time%=20|
|00000360| 0d 02 26 0e 6f 6e 74 69 | 6d 65 25 3d 34 35 0d 02 |..&.onti|me%=45..|
|00000370| 30 11 61 75 74 6f 73 63 | 72 6f 6c 6c 25 3d b9 0d |0.autosc|roll%=..|
|00000380| 02 3a 13 de 20 74 65 6d | 70 6c 61 74 65 25 20 34 |.:.. tem|plate% 4|
|00000390| 30 30 0d 02 44 12 f2 73 | 65 74 5f 74 65 6d 70 6c |00..D..s|et_templ|
|000003a0| 61 74 65 73 0d 02 4e 11 | f2 64 65 66 69 6e 65 5f |ates..N.|.define_|
|000003b0| 6d 65 6e 75 73 0d 02 58 | 0c f2 76 65 72 73 69 6f |menus..X|..versio|
|000003c0| 6e 0d 02 62 0c f2 62 61 | 72 69 63 6f 6e 0d 02 6c |n..b..ba|ricon..l|
|000003d0| 05 e1 0d 02 76 04 0d 02 | 80 0d dd f2 76 65 72 73 |....v...|....vers|
|000003e0| 69 6f 6e 0d 02 8a 2f ea | 54 24 3a 54 24 3d 76 65 |ion.../.|T$:T$=ve|
|000003f0| 72 73 69 6f 6e 24 3a e7 | ac a4 70 72 6f 64 3a 54 |rsion$:.|..prod:T|
|00000400| 24 2b 3d 22 20 2a 55 4e | 46 49 4e 49 53 48 45 44 |$+=" *UN|FINISHED|
|00000410| 2a 22 0d 02 94 24 f2 73 | 65 74 5f 69 63 6f 6e 74 |*"...$.s|et_icont|
|00000420| 65 78 74 28 77 5f 70 69 | 6e 66 6f 25 2c 34 2c 22 |ext(w_pi|nfo%,4,"|
|00000430| 76 22 2b 54 24 29 0d 02 | 9e 05 e1 0d 02 a8 04 0d |v"+T$)..|........|
|00000440| 02 b2 2c dd a4 70 72 6f | 64 3d c1 76 65 72 73 69 |..,..pro|d=.versi|
|00000450| 6f 6e 24 2c a7 76 65 72 | 73 69 6f 6e 24 2c 22 2e |on$,.ver|sion$,".|
|00000460| 22 29 2b 31 2c 31 29 3d | 22 30 22 0d 02 bc 04 0d |")+1,1)=|"0".....|
|00000470| 02 c6 1b dd a4 64 65 62 | 75 67 3d ac a4 70 72 6f |.....deb|ug=..pro|
|00000480| 64 20 80 a6 2d 31 80 a6 | 2d 32 0d 02 d0 04 0d 02 |d ..-1..|-2......|
|00000490| da 0e dd a4 69 6e 69 74 | 77 69 6d 70 0d 02 e4 43 |....init|wimp...C|
|000004a0| 24 71 25 3d 22 54 41 53 | 4b 22 3a c8 99 20 22 57 |$q%="TAS|K":.. "W|
|000004b0| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|000004c0| 32 30 30 2c 21 71 25 2c | 61 70 70 6c 24 20 b8 20 |200,!q%,|appl$ . |
|000004d0| 21 71 25 2c 74 61 73 6b | 68 61 6e 64 6c 65 25 0d |!q%,task|handle%.|
|000004e0| 02 ee 08 3d 21 71 25 0d | 02 f8 04 0d 03 02 0d dd |...=!q%.|........|
|000004f0| f2 62 61 72 69 63 6f 6e | 0d 03 0c 2b 21 71 25 3d |.baricon|...+!q%=|
|00000500| 2d 31 3a 71 25 21 34 3d | 2d 30 3a 71 25 21 38 3d |-1:q%!4=|-0:q%!8=|
|00000510| 30 3a 71 25 21 31 32 3d | 36 34 3a 71 25 21 31 36 |0:q%!12=|64:q%!16|
|00000520| 3d 36 34 0d 03 16 19 71 | 25 21 32 30 3d 25 31 31 |=64....q|%!20=%11|
|00000530| 30 30 30 30 30 30 30 30 | 30 30 31 30 0d 03 20 16 |00000000|0010.. .|
|00000540| 24 28 71 25 2b 32 34 29 | 3d 22 21 22 2b 61 70 70 |$(q%+24)|="!"+app|
|00000550| 6c 24 0d 03 2a 24 c8 99 | 22 57 69 6d 70 5f 43 72 |l$..*$..|"Wimp_Cr|
|00000560| 65 61 74 65 49 63 6f 6e | 22 2c 2c 71 25 b8 62 61 |eateIcon|",,q%.ba|
|00000570| 72 69 63 6f 6e 25 0d 03 | 34 05 e1 0d 03 3e 04 0d |ricon%..|4....>..|
|00000580| 03 48 21 dd f2 65 72 72 | 6f 72 28 65 72 72 25 2c |.H!..err|or(err%,|
|00000590| 65 72 72 24 2c 65 72 6c | 25 2c 71 75 69 74 25 29 |err$,erl|%,quit%)|
|000005a0| 0d 03 52 14 40 25 3d 26 | 39 30 41 3a 2a 66 78 32 |..R.@%=&|90A:*fx2|
|000005b0| 32 39 2c 31 0d 03 5c 10 | ea 69 25 2c 65 25 2c 74 |29,1..\.|.i%,e%,t|
|000005c0| 24 2c 54 24 0d 03 66 1d | e7 a4 64 65 62 75 67 3a |$,T$..f.|..debug:|
|000005d0| 65 72 72 24 2b 3d 22 20 | 28 22 2b c3 9e 2b 22 29 |err$+=" |("+..+")|
|000005e0| 22 0d 03 70 06 ea 85 0d | 03 7a 18 ee 85 ea 3a f2 |"..p....|.z....:.|
|000005f0| 65 72 72 6f 72 28 9f 2c | f6 24 2c 9e 2c b9 29 0d |error(.,|.$,.,.).|
|00000600| 03 84 39 21 71 25 3d 65 | 72 72 25 3a 24 28 71 25 |..9!q%=e|rr%:$(q%|
|00000610| 2b 34 29 3d 65 72 72 24 | 3a c8 99 22 57 69 6d 70 |+4)=err$|:.."Wimp|
|00000620| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 71 25 |_ReportE|rror",q%|
|00000630| 2c 31 2c 61 70 70 6c 24 | 0d 03 8e 17 e7 71 75 69 |,1,appl$|.....qui|
|00000640| 74 25 84 a4 64 65 62 75 | 67 3a f2 71 75 69 74 0d |t%..debu|g:.quit.|
|00000650| 03 98 05 e1 0d 03 a2 04 | 0d 03 ac 0c dd f2 75 6d |........|......um|
|00000660| 65 73 73 31 0d 03 b6 2d | 72 65 66 25 3d 71 25 21 |ess1...-|ref%=q%!|
|00000670| 38 3a 74 61 73 6b 25 3d | 71 25 21 34 3a e7 74 61 |8:task%=|q%!4:.ta|
|00000680| 73 6b 25 3d 74 61 73 6b | 68 61 6e 64 6c 65 25 3a |sk%=task|handle%:|
|00000690| e1 0d 03 c0 0e c8 8e 20 | 71 25 21 31 36 20 ca 0d |....... |q%!16 ..|
|000006a0| 03 ca 0d c9 20 30 3a f2 | 71 75 69 74 0d 03 d4 10 |.... 0:.|quit....|
|000006b0| c9 20 26 35 30 32 3a f2 | 68 65 6c 70 0d 03 de 05 |. &502:.|help....|
|000006c0| cb 0d 03 e8 05 e1 0d 03 | f2 04 0d 03 fc 15 dd f2 |........|........|
|000006d0| 74 65 6d 70 6c 61 74 65 | 28 54 24 2c 71 25 29 0d |template|(T$,q%).|
|000006e0| 04 06 15 ea 20 63 25 3a | 24 77 6f 72 6b 62 75 66 |.... c%:|$workbuf|
|000006f0| 25 3d 54 24 0d 04 10 4a | c8 99 20 22 57 69 6d 70 |%=T$...J|.. "Wimp|
|00000700| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00000710| 71 25 2c 63 75 72 62 75 | 66 25 2c 65 6e 64 62 75 |q%,curbu|f%,endbu|
|00000720| 66 25 2c 2d 31 2c 77 6f | 72 6b 62 75 66 25 b8 2c |f%,-1,wo|rkbuf%.,|
|00000730| 2c 63 75 72 62 75 66 25 | 2c 2c 2c 2c 63 25 0d 04 |,curbuf%|,,,,c%..|
|00000740| 1a 2f e7 20 63 25 3d 30 | 20 8c 20 85 20 39 39 2c |./. c%=0| . . 99,|
|00000750| 22 54 65 6d 70 6c 61 74 | 65 20 27 22 2b 54 24 2b |"Templat|e '"+T$+|
|00000760| 22 27 20 6e 6f 74 20 66 | 6f 75 6e 64 22 0d 04 24 |"' not f|ound"..$|
|00000770| 05 e1 0d 04 2e 04 0d 04 | 38 13 dd f2 73 65 74 5f |........|8...set_|
|00000780| 74 65 6d 70 6c 61 74 65 | 73 0d 04 42 24 6e 61 6d |template|s..B$nam|
|00000790| 65 24 3d 22 3c 46 6c 61 | 73 68 65 72 24 44 69 72 |e$="<Fla|sher$Dir|
|000007a0| 3e 2e 46 6c 61 73 68 65 | 72 46 72 6d 22 0d 04 4c |>.Flashe|rFrm"..L|
|000007b0| 2b c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 35 2c |+.. "OS_|File",5,|
|000007c0| 6e 61 6d 65 24 20 b8 20 | 66 6f 75 6e 64 25 2c 2c |name$ . |found%,,|
|000007d0| 2c 2c 62 75 66 73 7a 25 | 0d 04 56 0f 62 75 66 73 |,,bufsz%|..V.bufs|
|000007e0| 7a 25 2b 3d 36 30 30 0d | 04 60 3c e7 20 66 6f 75 |z%+=600.|.`<. fou|
|000007f0| 6e 64 25 3c 3e 31 20 8c | 20 85 20 39 39 2c 61 70 |nd%<>1 .| . 99,ap|
|00000800| 70 6c 24 2b 22 20 66 69 | 6c 65 20 6d 69 73 73 69 |pl$+" fi|le missi|
|00000810| 6e 67 3a 20 27 22 2b 61 | 70 70 6c 24 2b 22 46 72 |ng: '"+a|ppl$+"Fr|
|00000820| 6d 27 22 0d 04 6a 07 ea | 49 25 0d 04 74 3b de 20 |m'"..j..|I%..t;. |
|00000830| 62 75 66 66 65 72 25 20 | 62 75 66 73 7a 25 3a 63 |buffer% |bufsz%:c|
|00000840| 75 72 62 75 66 25 3d 62 | 75 66 66 65 72 25 3a 65 |urbuf%=b|uffer%:e|
|00000850| 6e 64 62 75 66 25 3d 62 | 75 66 66 65 72 25 2b 62 |ndbuf%=b|uffer%+b|
|00000860| 75 66 73 7a 25 0d 04 7e | 20 c8 99 22 57 69 6d 70 |ufsz%..~| .."Wimp|
|00000870| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000880| 6e 61 6d 65 24 0d 04 88 | 3f f2 74 65 6d 70 6c 61 |name$...|?.templa|
|00000890| 74 65 28 22 50 72 6f 67 | 49 6e 66 6f 22 2c 71 25 |te("Prog|Info",q%|
|000008a0| 29 3a c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |):.."Wim|p_Create|
|000008b0| 57 69 6e 64 6f 77 22 2c | 2c 71 25 b8 77 5f 70 69 |Window",|,q%.w_pi|
|000008c0| 6e 66 6f 25 0d 04 92 19 | 66 72 65 65 25 3d 65 6e |nfo%....|free%=en|
|000008d0| 64 62 75 66 25 2d 63 75 | 72 62 75 66 25 0d 04 9c |dbuf%-cu|rbuf%...|
|000008e0| 1a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 54 65 |..."Wimp|_CloseTe|
|000008f0| 6d 70 6c 61 74 65 22 0d | 04 a6 05 e1 0d 04 b0 04 |mplate".|........|
|00000900| 0d 04 ba 12 dd f2 64 65 | 66 69 6e 65 5f 6d 65 6e |......de|fine_men|
|00000910| 75 73 0d 04 c4 07 ea 74 | 24 0d 04 ce 0f de 20 6d |us.....t|$..... m|
|00000920| 6c 69 73 74 25 20 33 32 | 0d 04 d8 0f 62 75 66 73 |list% 32|....bufs|
|00000930| 7a 25 3d 26 32 30 30 0d | 04 e2 43 de 20 6d 65 6e |z%=&200.|..C. men|
|00000940| 75 66 72 65 65 25 20 62 | 75 66 73 7a 25 3a 6d 65 |ufree% b|ufsz%:me|
|00000950| 6e 75 70 74 72 25 3d 6d | 65 6e 75 66 72 65 65 25 |nuptr%=m|enufree%|
|00000960| 3a 6d 65 6e 75 65 6e 64 | 25 3d 6d 65 6e 75 66 72 |:menuend|%=menufr|
|00000970| 65 65 25 2b 62 75 66 73 | 7a 25 0d 04 ec 1c 6d 65 |ee%+bufs|z%....me|
|00000980| 6e 75 73 74 61 72 74 25 | 3d 6d 65 6e 75 66 72 65 |nustart%|=menufre|
|00000990| 65 25 3a f7 2b 32 0d 04 | f6 20 f3 74 24 3a 6d 5f |e%:.+2..|. .t$:m_|
|000009a0| 6d 61 69 6e 25 3d a4 63 | 72 65 61 74 65 5f 6d 65 |main%=.c|reate_me|
|000009b0| 6e 75 28 74 24 29 0d 05 | 00 05 e1 0d 05 0a 04 0d |nu(t$)..|........|
|000009c0| 05 14 34 dc 22 23 46 6c | 61 73 68 65 72 2c 49 6e |..4."#Fl|asher,In|
|000009d0| 66 6f 3e 77 5f 70 69 6e | 66 6f 25 2c 46 6c 61 73 |fo>w_pin|fo%,Flas|
|000009e0| 68 2c 53 63 72 6f 6c 6c | 2c 46 69 6e 64 2c 51 75 |h,Scroll|,Find,Qu|
|000009f0| 69 74 22 0d 05 1e 04 0d | 05 28 17 dd f2 63 6c 6f |it".....|.(...clo|
|00000a00| 73 65 5f 77 69 6e 64 6f | 77 28 21 71 25 29 0d 05 |se_windo|w(!q%)..|
|00000a10| 32 1c c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |2..."Wim|p_CloseW|
|00000a20| 69 6e 64 6f 77 22 2c 2c | 71 25 0d 05 3c 05 e1 0d |indow",,|q%..<...|
|00000a30| 05 46 04 0d 05 50 1a dd | a4 69 6e 64 69 72 65 63 |.F...P..|.indirec|
|00000a40| 74 5f 61 64 64 72 28 68 | 25 2c 69 25 29 0d 05 5a |t_addr(h|%,i%)..Z|
|00000a50| 1a f2 67 65 74 5f 69 63 | 6f 6e 5f 73 74 61 74 65 |..get_ic|on_state|
|00000a60| 28 68 25 2c 69 25 29 0d | 05 64 0a f2 63 68 6b 69 |(h%,i%).|.d..chki|
|00000a70| 69 0d 05 6e 0a 3d 71 25 | 21 32 38 0d 05 78 04 0d |i..n.=q%|!28..x..|
|00000a80| 05 82 18 dd a4 69 63 6f | 6e 5f 6c 65 6e 67 74 68 |.....ico|n_length|
|00000a90| 28 68 25 2c 69 25 29 0d | 05 8c 1a f2 67 65 74 5f |(h%,i%).|....get_|
|00000aa0| 69 63 6f 6e 5f 73 74 61 | 74 65 28 68 25 2c 69 25 |icon_sta|te(h%,i%|
|00000ab0| 29 0d 05 96 0a f2 63 68 | 6b 69 69 0d 05 a0 0a 3d |).....ch|kii....=|
|00000ac0| 71 25 21 33 36 0d 05 aa | 04 0d 05 b4 0b dd f2 63 |q%!36...|.......c|
|00000ad0| 68 6b 69 69 0d 05 be 2e | e7 28 71 25 21 32 34 80 |hkii....|.(q%!24.|
|00000ae0| 26 31 30 30 29 3d 30 20 | 85 20 39 39 2c 22 49 63 |&100)=0 |. 99,"Ic|
|00000af0| 6f 6e 20 6e 6f 74 20 69 | 6e 64 69 72 65 63 74 65 |on not i|ndirecte|
|00000b00| 64 22 0d 05 c8 05 e1 0d | 05 d2 04 0d 05 dc 1b dd |d"......|........|
|00000b10| f2 67 65 74 5f 69 63 6f | 6e 5f 73 74 61 74 65 28 |.get_ico|n_state(|
|00000b20| 68 25 2c 69 25 29 0d 05 | e6 12 21 71 25 3d 68 25 |h%,i%)..|..!q%=h%|
|00000b30| 3a 71 25 21 34 3d 69 25 | 0d 05 f0 1d c8 99 22 57 |:q%!4=i%|......"W|
|00000b40| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00000b50| 22 2c 2c 71 25 0d 05 fa | 05 e1 0d 06 04 04 0d 06 |",,q%...|........|
|00000b60| 0e 11 dd f2 72 65 61 64 | 70 6f 69 6e 74 65 72 0d |....read|pointer.|
|00000b70| 06 18 13 ea 71 25 3a 71 | 25 3d 77 6f 72 6b 62 75 |....q%:q|%=workbu|
|00000b80| 66 25 0d 06 22 1f c8 99 | 22 57 69 6d 70 5f 47 65 |f%.."...|"Wimp_Ge|
|00000b90| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 71 |tPointer|Info",,q|
|00000ba0| 25 0d 06 2c 31 6d 78 25 | 3d 21 71 25 3a 6d 79 25 |%..,1mx%|=!q%:my%|
|00000bb0| 3d 71 25 21 34 3a 6d 62 | 25 3d 71 25 21 38 3a 6d |=q%!4:mb|%=q%!8:m|
|00000bc0| 68 25 3d 71 25 21 31 32 | 3a 6d 69 25 3d 71 25 21 |h%=q%!12|:mi%=q%!|
|00000bd0| 31 36 0d 06 36 05 e1 0d | 06 40 04 0d 06 4a 24 dd |16..6...|.@...J$.|
|00000be0| f2 6d 6f 75 73 65 28 6d | 78 25 2c 6d 79 25 2c 6d |.mouse(m|x%,my%,m|
|00000bf0| 62 25 2c 6d 68 25 2c 6d | 69 25 2c 6d 6f 25 29 0d |b%,mh%,m|i%,mo%).|
|00000c00| 06 54 0c c8 8e 20 6d 62 | 25 20 ca 0d 06 5e 0d c9 |.T... mb|% ...^..|
|00000c10| 20 32 3a f2 6d 65 6e 75 | 0d 06 68 11 c9 20 31 2c | 2:.menu|..h.. 1,|
|00000c20| 34 3a f2 73 65 6c 65 63 | 74 0d 06 72 05 cb 0d 06 |4:.selec|t..r....|
|00000c30| 7c 05 e1 0d 06 86 04 0d | 06 90 1c dd f2 73 65 74 ||.......|.....set|
|00000c40| 5f 69 63 6f 6e 74 65 78 | 74 28 68 25 2c 69 25 2c |_icontex|t(h%,i%,|
|00000c50| 54 24 29 0d 06 9a 1f 54 | 24 3d c0 54 24 2c a4 69 |T$)....T|$=.T$,.i|
|00000c60| 63 6f 6e 5f 6c 65 6e 67 | 74 68 28 68 25 2c 69 25 |con_leng|th(h%,i%|
|00000c70| 29 29 0d 06 a4 1d 24 a4 | 69 6e 64 69 72 65 63 74 |))....$.|indirect|
|00000c80| 5f 61 64 64 72 28 68 25 | 2c 69 25 29 3d 54 24 0d |_addr(h%|,i%)=T$.|
|00000c90| 06 ae 13 f2 69 63 6f 6e | 75 70 64 28 68 25 2c 69 |....icon|upd(h%,i|
|00000ca0| 25 29 0d 06 b8 05 e1 0d | 06 c2 04 0d 06 cc 1f dd |%)......|........|
|00000cb0| f2 73 65 74 5f 69 63 6f | 6e 28 68 25 2c 69 25 2c |.set_ico|n(h%,i%,|
|00000cc0| 62 69 63 25 2c 65 6f 72 | 25 29 0d 06 d6 13 ea 71 |bic%,eor|%).....q|
|00000cd0| 25 3a 71 25 3d 77 6f 72 | 6b 62 75 66 25 0d 06 e0 |%:q%=wor|kbuf%...|
|00000ce0| 27 21 71 25 3d 68 25 3a | 71 25 21 34 3d 69 25 3a |'!q%=h%:|q%!4=i%:|
|00000cf0| 71 25 21 31 32 3d 62 69 | 63 25 3a 71 25 21 38 3d |q%!12=bi|c%:q%!8=|
|00000d00| 65 6f 72 25 0d 06 ea 1d | c8 99 22 57 69 6d 70 5f |eor%....|.."Wimp_|
|00000d10| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |SetIconS|tate",,q|
|00000d20| 25 0d 06 f4 05 e1 0d 06 | fe 04 0d 07 08 2b dd f2 |%.......|.....+..|
|00000d30| 69 63 6f 6e 75 70 64 28 | 68 25 2c 69 25 29 3a f2 |iconupd(|h%,i%):.|
|00000d40| 73 65 74 5f 69 63 6f 6e | 28 68 25 2c 69 25 2c 30 |set_icon|(h%,i%,0|
|00000d50| 2c 30 29 3a e1 0d 07 12 | 04 0d 07 1c 0c dd f2 73 |,0):....|.......s|
|00000d60| 65 6c 65 63 74 0d 07 26 | 0a c8 8e 6d 68 25 ca 0d |elect..&|...mh%..|
|00000d70| 07 30 12 c9 2d 32 3a f2 | 73 68 6f 77 63 61 72 65 |.0..-2:.|showcare|
|00000d80| 74 0d 07 3a 05 cb 0d 07 | 44 05 e1 0d 07 4e 04 0d |t..:....|D....N..|
|00000d90| 07 58 0a dd f2 6d 65 6e | 75 0d 07 62 0a c8 8e 6d |.X...men|u..b...m|
|00000da0| 68 25 ca 0d 07 6c 07 c9 | 2d 32 0d 07 76 20 6d 79 |h%...l..|-2..v my|
|00000db0| 25 3d 36 34 2b 35 2a 34 | 30 3a f2 70 6f 70 28 6d |%=64+5*4|0:.pop(m|
|00000dc0| 5f 6d 61 69 6e 25 2c 2d | 31 29 0d 07 80 05 cb 0d |_main%,-|1)......|
|00000dd0| 07 8a 05 e1 0d 07 94 04 | 0d 07 9e 15 dd a4 70 61 |........|......pa|
|00000de0| 72 28 74 24 2c 73 24 2c | f8 20 69 25 29 0d 07 a8 |r(t$,s$,|. i%)...|
|00000df0| 08 ea 69 31 25 0d 07 b2 | 1e 69 31 25 3d 69 25 2b |..i1%...|.i1%=i%+|
|00000e00| 31 3a 69 25 3d a7 74 24 | 2b 73 24 2c 73 24 2c 69 |1:i%=.t$|+s$,s$,i|
|00000e10| 31 25 29 0d 07 bc 14 3d | c1 74 24 2c 69 31 25 2c |1%)....=|.t$,i1%,|
|00000e20| 69 25 2d 69 31 25 29 0d | 07 c6 04 0d 07 d0 18 dd |i%-i1%).|........|
|00000e30| a4 63 72 65 61 74 65 5f | 6d 65 6e 75 28 6d 65 6e |.create_|menu(men|
|00000e40| 75 24 29 0d 07 da 2f e7 | 6d 65 6e 75 66 72 65 65 |u$).../.|menufree|
|00000e50| 25 2b 32 38 3e 6d 65 6e | 75 65 6e 64 25 20 85 39 |%+28>men|uend% .9|
|00000e60| 39 2c 22 4d 65 6e 75 20 | 61 72 65 61 20 66 75 6c |9,"Menu |area ful|
|00000e70| 6c 22 0d 07 e4 08 ea 20 | 6d 25 0d 07 ee 16 6d 65 |l"..... |m%....me|
|00000e80| 6e 75 70 74 72 25 3d 6d | 65 6e 75 66 72 65 65 25 |nuptr%=m|enufree%|
|00000e90| 0d 07 f8 08 69 25 3d 30 | 0d 08 02 43 e7 20 c0 6d |....i%=0|...C. .m|
|00000ea0| 65 6e 75 24 2c 31 29 3d | 22 23 22 69 25 3d 31 3a |enu$,1)=|"#"i%=1:|
|00000eb0| 6d 65 6e 75 74 69 74 6c | 65 24 3d a4 70 61 72 28 |menutitl|e$=.par(|
|00000ec0| 6d 65 6e 75 24 2c 22 2c | 22 2c 69 25 29 8b 6d 65 |menu$,",|",i%).me|
|00000ed0| 6e 75 74 69 74 6c 65 24 | 3d 22 22 0d 08 0c 18 24 |nutitle$|=""....$|
|00000ee0| 6d 65 6e 75 70 74 72 25 | 3d 6d 65 6e 75 74 69 74 |menuptr%|=menutit|
|00000ef0| 6c 65 24 0d 08 16 3b 6d | 65 6e 75 70 74 72 25 3f |le$...;m|enuptr%?|
|00000f00| 31 32 3d 37 3a 6d 65 6e | 75 70 74 72 25 3f 31 33 |12=7:men|uptr%?13|
|00000f10| 3d 32 3a 6d 65 6e 75 70 | 74 72 25 3f 31 34 3d 37 |=2:menup|tr%?14=7|
|00000f20| 3a 6d 65 6e 75 70 74 72 | 25 3f 31 35 3d 30 0d 08 |:menuptr|%?15=0..|
|00000f30| 20 33 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 31 39 | 3menupt|r%!16=19|
|00000f40| 36 2d 32 34 3a 6d 65 6e | 75 70 74 72 25 21 32 30 |6-24:men|uptr%!20|
|00000f50| 3d 34 30 3a 6d 65 6e 75 | 70 74 72 25 21 32 34 3d |=40:menu|ptr%!24=|
|00000f60| 30 0d 08 2a 22 6d 65 6e | 75 70 74 72 25 2b 3d 32 |0..*"men|uptr%+=2|
|00000f70| 38 3a 6d 61 78 78 25 3d | a9 6d 65 6e 75 74 69 74 |8:maxx%=|.menutit|
|00000f80| 6c 65 24 0d 08 34 1d f5 | 69 74 65 6d 24 3d a4 70 |le$..4..|item$=.p|
|00000f90| 61 72 28 6d 65 6e 75 24 | 2c 22 2c 22 2c 69 25 29 |ar(menu$|,",",i%)|
|00000fa0| 0d 08 3e 14 f2 6d 65 6e | 75 69 74 65 6d 28 69 74 |..>..men|uitem(it|
|00000fb0| 65 6d 24 29 0d 08 48 0e | fd 20 69 74 65 6d 24 3d |em$)..H.|. item$=|
|00000fc0| 22 22 0d 08 52 24 6d 25 | 3d 6d 65 6e 75 66 72 65 |""..R$m%|=menufre|
|00000fd0| 65 25 3a 6d 25 21 31 36 | 3d 28 6d 61 78 78 25 2a |e%:m%!16|=(maxx%*|
|00000fe0| 38 2b 36 29 2a 32 0d 08 | 5c 16 6d 65 6e 75 66 72 |8+6)*2..|\.menufr|
|00000ff0| 65 65 25 3d 6d 65 6e 75 | 70 74 72 25 0d 08 66 07 |ee%=menu|ptr%..f.|
|00001000| 3d 6d 25 0d 08 70 04 0d | 08 7a 15 dd f2 6d 65 6e |=m%..p..|.z...men|
|00001010| 75 69 74 65 6d 28 74 65 | 78 74 24 29 0d 08 84 2e |uitem(te|xt$)....|
|00001020| e7 74 65 78 74 24 3d 22 | 22 6d 65 6e 75 70 74 72 |.text$="|"menuptr|
|00001030| 25 21 2d 32 34 3d 28 6d | 65 6e 75 70 74 72 25 21 |%!-24=(m|enuptr%!|
|00001040| 2d 32 34 29 84 26 38 30 | 3a e1 0d 08 8e 2f e7 6d |-24).&80|:..../.m|
|00001050| 65 6e 75 70 74 72 25 2b | 32 34 3e 6d 65 6e 75 65 |enuptr%+|24>menue|
|00001060| 6e 64 25 8c 20 85 39 39 | 2c 22 4d 65 6e 75 20 61 |nd%. .99|,"Menu a|
|00001070| 72 65 61 20 66 75 6c 6c | 22 0d 08 98 0c ea 69 25 |rea full|".....i%|
|00001080| 2c 66 6c 67 25 0d 08 a2 | 0c 66 6c 67 25 3d 26 30 |,flg%...|.flg%=&0|
|00001090| 30 0d 08 ac 12 69 25 3d | a7 74 65 78 74 24 2c 22 |0....i%=|.text$,"|
|000010a0| 3e 22 29 0d 08 b6 3c e7 | 69 25 3e 30 73 75 62 70 |>")...<.|i%>0subp|
|000010b0| 74 72 25 3d a0 c1 74 65 | 78 74 24 2c 69 25 2b 31 |tr%=..te|xt$,i%+1|
|000010c0| 29 3a 74 65 78 74 24 3d | c0 74 65 78 74 24 2c 69 |):text$=|.text$,i|
|000010d0| 25 2d 31 29 8b 73 75 62 | 70 74 72 25 3d 2d 31 0d |%-1).sub|ptr%=-1.|
|000010e0| 08 c0 12 69 25 3d a7 74 | 65 78 74 24 2c 22 7d 22 |...i%=.t|ext$,"}"|
|000010f0| 29 0d 08 ca 3b e7 69 25 | 3e 30 73 75 62 70 74 72 |)...;.i%|>0subptr|
|00001100| 25 3d a0 c1 74 65 78 74 | 24 2c 69 25 2b 31 29 3a |%=..text|$,i%+1):|
|00001110| 74 65 78 74 24 3d c0 74 | 65 78 74 24 2c 69 25 2d |text$=.t|ext$,i%-|
|00001120| 31 29 3a 66 6c 67 25 2b | 3d 26 30 38 0d 08 d4 29 |1):flg%+|=&08...)|
|00001130| e7 c2 74 65 78 74 24 2c | 31 29 3d 22 23 22 74 65 |..text$,|1)="#"te|
|00001140| 78 74 24 3d c0 74 65 78 | 74 24 29 3a 66 6c 67 25 |xt$=.tex|t$):flg%|
|00001150| 2b 3d 26 30 32 0d 08 de | 3b 6d 65 6e 75 70 74 72 |+=&02...|;menuptr|
|00001160| 25 21 30 3d 66 6c 67 25 | 3a 6d 65 6e 75 70 74 72 |%!0=flg%|:menuptr|
|00001170| 25 21 34 3d 73 75 62 70 | 74 72 25 3a 6d 65 6e 75 |%!4=subp|tr%:menu|
|00001180| 70 74 72 25 21 38 3d 26 | 30 37 30 30 30 30 32 31 |ptr%!8=&|07000021|
|00001190| 0d 08 e8 13 e7 c0 74 65 | 78 74 24 2c 31 29 3d 22 |......te|xt$,1)="|
|000011a0| 24 22 8c 0d 08 f2 32 21 | 6d 65 6e 75 70 74 72 25 |$"....2!|menuptr%|
|000011b0| 2b 3d 26 30 34 3a 6d 65 | 6e 75 70 74 72 25 21 38 |+=&04:me|nuptr%!8|
|000011c0| 2b 3d 26 31 30 30 3a 69 | 25 3d a7 74 65 78 74 24 |+=&100:i|%=.text$|
|000011d0| 2c 22 28 22 29 0d 08 fc | 33 e7 69 25 3e 30 8c 4c |,"(")...|3.i%>0.L|
|000011e0| 25 3d bb c1 74 65 78 74 | 24 2c 69 25 2b 31 29 3a |%=..text|$,i%+1):|
|000011f0| 74 65 78 74 24 3d c0 74 | 65 78 74 24 2c 69 25 2d |text$=.t|ext$,i%-|
|00001200| 31 29 8b 4c 25 3d 31 32 | 0d 09 06 38 6d 65 6e 75 |1).L%=12|...8menu|
|00001210| 70 74 72 25 21 31 32 3d | a0 c1 74 65 78 74 24 2c |ptr%!12=|..text$,|
|00001220| 32 29 3a 6d 65 6e 75 70 | 74 72 25 21 31 36 3d 2d |2):menup|tr%!16=-|
|00001230| 31 3a 6d 65 6e 75 70 74 | 72 25 21 32 30 3d 4c 25 |1:menupt|r%!20=L%|
|00001240| 0d 09 10 12 74 65 78 74 | 24 3d c4 4c 25 2c 22 20 |....text|$=.L%," |
|00001250| 22 29 0d 09 1a 05 cc 0d | 09 24 10 e7 a9 74 65 78 |")......|.$...tex|
|00001260| 74 24 3c 3d 31 32 8c 0d | 09 2e 18 24 28 6d 65 6e |t$<=12..|...$(men|
|00001270| 75 70 74 72 25 2b 31 32 | 29 3d 74 65 78 74 24 0d |uptr%+12|)=text$.|
|00001280| 09 38 05 cc 0d 09 42 25 | 49 25 3d a4 77 6f 72 6b |.8....B%|I%=.work|
|00001290| 73 70 61 63 65 28 a9 74 | 65 78 74 24 2b 31 29 3a |space(.t|ext$+1):|
|000012a0| 24 49 25 3d 74 65 78 74 | 24 0d 09 4c 36 6d 65 6e |$I%=text|$..L6men|
|000012b0| 75 70 74 72 25 21 31 32 | 3d 49 25 3a 6d 65 6e 75 |uptr%!12|=I%:menu|
|000012c0| 70 74 72 25 21 31 36 3d | 2d 31 3a 6d 65 6e 75 70 |ptr%!16=|-1:menup|
|000012d0| 74 72 25 21 32 30 3d a9 | 74 65 78 74 24 2b 31 0d |tr%!20=.|text$+1.|
|000012e0| 09 56 20 6d 65 6e 75 70 | 74 72 25 21 38 3d 6d 65 |.V menup|tr%!8=me|
|000012f0| 6e 75 70 74 72 25 21 38 | 20 84 20 26 31 30 30 0d |nuptr%!8| . &100.|
|00001300| 09 60 05 cd 0d 09 6a 1d | e7 a9 74 65 78 74 24 3e |.`....j.|..text$>|
|00001310| 6d 61 78 78 25 6d 61 78 | 78 25 3d a9 74 65 78 74 |maxx%max|x%=.text|
|00001320| 24 0d 09 74 05 cd 0d 09 | 7e 10 6d 65 6e 75 70 74 |$..t....|~.menupt|
|00001330| 72 25 2b 3d 32 34 0d 09 | 88 05 e1 0d 09 92 04 0d |r%+=24..|........|
|00001340| 09 9c 13 dd a4 77 6f 72 | 6b 73 70 61 63 65 28 4c |.....wor|kspace(L|
|00001350| 25 29 0d 09 a6 32 e7 20 | 63 75 72 62 75 66 25 2b |%)...2. |curbuf%+|
|00001360| 4c 25 3e 65 6e 64 62 75 | 66 25 85 39 39 2c 22 4e |L%>endbu|f%.99,"N|
|00001370| 6f 20 6d 6f 72 65 20 62 | 75 66 66 65 72 20 73 70 |o more b|uffer sp|
|00001380| 61 63 65 22 0d 09 b0 1b | 63 75 72 62 75 66 25 2b |ace"....|curbuf%+|
|00001390| 3d 4c 25 3a 3d 63 75 72 | 62 75 66 25 2d 4c 25 0d |=L%:=cur|buf%-L%.|
|000013a0| 09 ba 04 0d 09 c4 1a dd | f2 70 6f 70 28 6d 65 6e |........|.pop(men|
|000013b0| 75 25 2c 74 72 65 65 25 | 29 3a ea 49 25 0d 09 ce |u%,tree%|):.I%...|
|000013c0| 13 e7 6d 65 6e 75 25 3d | 6d 5f 6d 61 69 6e 25 8c |..menu%=|m_main%.|
|000013d0| 0d 09 d8 15 f2 63 6c 65 | 61 72 74 73 28 6d 5f 6d |.....cle|arts(m_m|
|000013e0| 61 69 6e 25 29 0d 09 e2 | 1f e7 66 6c 61 73 68 69 |ain%)...|..flashi|
|000013f0| 6e 67 25 3a f2 74 69 63 | 6b 28 6d 5f 6d 61 69 6e |ng%:.tic|k(m_main|
|00001400| 25 2c 31 29 0d 09 ec 21 | e7 61 75 74 6f 73 63 72 |%,1)...!|.autoscr|
|00001410| 6f 6c 6c 25 3a f2 74 69 | 63 6b 28 6d 5f 6d 61 69 |oll%:.ti|ck(m_mai|
|00001420| 6e 25 2c 32 29 0d 09 f6 | 39 c8 99 22 57 69 6d 70 |n%,2)...|9.."Wimp|
|00001430| 5f 47 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_GetCare|tPositio|
|00001440| 6e 22 2c 2c 71 25 3a e7 | 21 71 25 3c 30 f2 73 68 |n",,q%:.|!q%<0.sh|
|00001450| 61 64 65 28 6d 5f 6d 61 | 69 6e 25 2c 33 29 0d 0a |ade(m_ma|in%,3)..|
|00001460| 00 05 cd 0d 0a 0a 2d c8 | 99 20 22 57 69 6d 70 5f |......-.|. "Wimp_|
|00001470| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |CreateMe|nu",,men|
|00001480| 75 25 2c 6d 78 25 2d 35 | 30 2c 6d 79 25 2b 33 32 |u%,mx%-5|0,my%+32|
|00001490| 0d 0a 14 13 6f 70 65 6e | 6d 65 6e 75 25 3d 6d 65 |....open|menu%=me|
|000014a0| 6e 75 25 0d 0a 1e 05 e1 | 0d 0a 28 04 0d 0a 32 0c |nu%.....|..(...2.|
|000014b0| dd f2 6e 6f 6d 65 6e 75 | 0d 0a 3c 28 c8 99 22 57 |..nomenu|..<(.."W|
|000014c0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|000014d0| 2c 2d 31 3a 6f 70 65 6e | 6d 65 6e 75 25 3d 2d 31 |,-1:open|menu%=-1|
|000014e0| 0d 0a 46 05 e1 0d 0a 50 | 04 0d 0a 5a 10 dd f2 6d |..F....P|...Z...m|
|000014f0| 65 6e 75 73 65 6c 65 63 | 74 0d 0a 64 07 ea 49 25 |enuselec|t..d..I%|
|00001500| 0d 0a 6e 08 49 25 3d 30 | 0d 0a 78 05 f5 0d 0a 82 |..n.I%=0|..x.....|
|00001510| 13 6d 6c 69 73 74 25 21 | 49 25 3d 71 25 21 49 25 |.mlist%!|I%=q%!I%|
|00001520| 0d 0a 8c 09 49 25 2b 3d | 34 0d 0a 96 11 fd 71 25 |....I%+=|4.....q%|
|00001530| 21 28 49 25 2d 34 29 3d | 2d 31 0d 0a a0 10 f2 72 |!(I%-4)=|-1.....r|
|00001540| 65 61 64 70 6f 69 6e 74 | 65 72 0d 0a aa 10 c8 8e |eadpoint|er......|
|00001550| 6f 70 65 6e 6d 65 6e 75 | 25 ca 0d 0a b4 14 c9 6d |openmenu|%......m|
|00001560| 5f 6d 61 69 6e 25 3a f2 | 6d 5f 6d 61 69 6e 0d 0a |_main%:.|m_main..|
|00001570| be 05 cb 0d 0a c8 0b e7 | 6d 62 25 3d 31 8c 0d 0a |........|mb%=1...|
|00001580| d2 23 f2 70 6f 70 28 6f | 70 65 6e 6d 65 6e 75 25 |.#.pop(o|penmenu%|
|00001590| 2c 6d 6c 69 73 74 25 29 | 3a 8b f2 6e 6f 6d 65 6e |,mlist%)|:..nomen|
|000015a0| 75 0d 0a dc 05 cd 0d 0a | e6 05 e1 0d 0a f0 04 0d |u.......|........|
|000015b0| 0a fa 0c dd f2 6d 5f 6d | 61 69 6e 0d 0b 04 0e c8 |.....m_m|ain.....|
|000015c0| 8e 21 6d 6c 69 73 74 25 | ca 0d 0b 0e 0d c9 31 3a |.!mlist%|......1:|
|000015d0| f2 66 6c 61 73 68 0d 0b | 18 1f c9 32 3a 61 75 74 |.flash..|...2:aut|
|000015e0| 6f 73 63 72 6f 6c 6c 25 | 3d ac 61 75 74 6f 73 63 |oscroll%|=.autosc|
|000015f0| 72 6f 6c 6c 25 0d 0b 22 | 11 c9 33 3a f2 73 68 6f |roll%.."|..3:.sho|
|00001600| 77 63 61 72 65 74 0d 0b | 2c 0c c9 34 3a f2 71 75 |wcaret..|,..4:.qu|
|00001610| 69 74 0d 0b 36 05 cb 0d | 0b 40 05 e1 0d 0b 4a 04 |it..6...|.@....J.|
|00001620| 0d 0b 54 20 dd f2 63 6c | 65 61 72 74 73 28 6d 68 |..T ..cl|earts(mh|
|00001630| 25 29 3a ea 49 25 3a 49 | 25 3d 6d 68 25 2b 32 38 |%):.I%:I|%=mh%+28|
|00001640| 0d 0b 5e 22 e7 6d 68 25 | 3c 6d 65 6e 75 73 74 61 |..^".mh%|<menusta|
|00001650| 72 74 25 84 6d 68 25 3e | 6d 65 6e 75 65 6e 64 25 |rt%.mh%>|menuend%|
|00001660| 3a e1 0d 0b 68 37 f5 3a | 21 49 25 3d 21 49 25 80 |:...h7.:|!I%=!I%.|
|00001670| ac 31 3a 49 25 21 38 3d | 49 25 21 38 80 ac 26 34 |.1:I%!8=|I%!8..&4|
|00001680| 30 30 30 30 30 3a 3a 49 | 25 2b 3d 32 34 3a fd 49 |00000::I|%+=24:.I|
|00001690| 25 21 2d 32 34 80 26 38 | 30 0d 0b 72 05 e1 0d 0b |%!-24.&8|0..r....|
|000016a0| 7c 04 0d 0b 86 3d dd f2 | 73 68 61 64 65 28 6d 68 ||....=..|shade(mh|
|000016b0| 25 2c 49 25 29 3a 6d 68 | 25 21 28 32 38 2b 38 2b |%,I%):mh|%!(28+8+|
|000016c0| 32 34 2a 49 25 29 3d 6d | 68 25 21 28 32 38 2b 38 |24*I%)=m|h%!(28+8|
|000016d0| 2b 32 34 2a 49 25 29 84 | 26 34 30 30 30 30 30 0d |+24*I%).|&400000.|
|000016e0| 0b 90 34 dd f2 74 69 63 | 6b 28 6d 68 25 2c 49 25 |..4..tic|k(mh%,I%|
|000016f0| 29 3a 6d 68 25 21 28 32 | 38 2b 32 34 2a 49 25 29 |):mh%!(2|8+24*I%)|
|00001700| 3d 6d 68 25 21 28 32 38 | 2b 32 34 2a 49 25 29 84 |=mh%!(28|+24*I%).|
|00001710| 26 30 31 0d 0b 9a 05 e1 | 0d 0b a4 04 0d 0b ae 0b |&01.....|........|
|00001720| dd f2 66 6c 61 73 68 0d | 0b b8 0f e7 66 6c 61 73 |..flash.|....flas|
|00001730| 68 69 6e 67 25 8c 0d 0b | c2 0d f2 72 65 73 74 6f |hing%...|...resto|
|00001740| 72 65 63 0d 0b cc 0f 66 | 6c 61 73 68 69 6e 67 25 |rec....f|lashing%|
|00001750| 3d a3 0d 0b d6 05 cc 0d | 0b e0 0c 64 65 6c 61 79 |=.......|...delay|
|00001760| 25 3d 30 0d 0b ea 0f 66 | 6c 61 73 68 69 6e 67 25 |%=0....f|lashing%|
|00001770| 3d b9 0d 0b f4 05 cd 0d | 0b fe 05 e1 0d 0c 08 04 |=.......|........|
|00001780| 0d 0c 12 0d dd f2 62 61 | 63 6b 67 6e 64 0d 0c 1c |......ba|ckgnd...|
|00001790| 19 e7 66 69 6e 64 63 61 | 72 65 74 25 f2 66 69 6e |..findca|ret%.fin|
|000017a0| 64 63 61 72 65 74 0d 0c | 26 1c e7 ac 66 6c 61 73 |dcaret..|&...flas|
|000017b0| 68 69 6e 67 25 3a 64 65 | 6c 61 79 25 3d 31 45 39 |hing%:de|lay%=1E9|
|000017c0| 3a e1 0d 0c 30 21 c8 99 | 22 57 69 6d 70 5f 47 65 |:...0!..|"Wimp_Ge|
|000017d0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000017e0| 2c 71 25 0d 0c 3a 26 c8 | 99 20 22 4f 53 5f 52 65 |,q%..:&.|. "OS_Re|
|000017f0| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|00001800| 20 b8 20 64 65 6c 61 79 | 25 0d 0c 44 0c e7 21 71 | . delay|%..D..!q|
|00001810| 25 3e 3d 30 8c 0d 0c 4e | 19 71 25 21 31 36 3d 28 |%>=0...N|.q%!16=(|
|00001820| 71 25 21 31 36 29 82 28 | 31 3c 3c 32 35 29 0d 0c |q%!16).(|1<<25)..|
|00001830| 58 34 e7 71 25 21 31 36 | 80 28 31 3c 3c 32 35 29 |X4.q%!16|.(1<<25)|
|00001840| 3a 64 65 6c 61 79 25 2b | 3d 6f 66 66 74 69 6d 65 |:delay%+|=offtime|
|00001850| 25 3a 8b 64 65 6c 61 79 | 25 2b 3d 6f 6e 74 69 6d |%:.delay|%+=ontim|
|00001860| 65 25 0d 0c 62 09 f2 73 | 65 74 63 0d 0c 6c 05 cc |e%..b..s|etc..l..|
|00001870| 0d 0c 76 13 64 65 6c 61 | 79 25 2b 3d 6f 6e 74 69 |..v.dela|y%+=onti|
|00001880| 6d 65 25 0d 0c 80 05 cd | 0d 0c 8a 05 e1 0d 0c 94 |me%.....|........|
|00001890| 04 0d 0c 9e 0a dd f2 73 | 65 74 63 0d 0c a8 3d c8 |.......s|etc...=.|
|000018a0| 99 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 |."Wimp_S|etCaretP|
|000018b0| 6f 73 69 74 69 6f 6e 22 | 2c 21 71 25 2c 71 25 21 |osition"|,!q%,q%!|
|000018c0| 34 2c 71 25 21 38 2c 71 | 25 21 31 32 2c 71 25 21 |4,q%!8,q|%!12,q%!|
|000018d0| 31 36 2c 71 25 21 32 30 | 0d 0c b2 05 e1 0d 0c bc |16,q%!20|........|
|000018e0| 04 0d 0c c6 1c dd f2 72 | 65 73 74 6f 72 65 63 3a |.......r|estorec:|
|000018f0| e7 ac 66 6c 61 73 68 69 | 6e 67 25 3a e1 0d 0c d0 |..flashi|ng%:....|
|00001900| 21 c8 99 22 57 69 6d 70 | 5f 47 65 74 43 61 72 65 |!.."Wimp|_GetCare|
|00001910| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 71 25 0d 0c |tPositio|n",,q%..|
|00001920| da 27 e7 21 71 25 3e 30 | 3a 71 25 21 31 36 3d 28 |.'.!q%>0|:q%!16=(|
|00001930| 71 25 21 31 36 29 80 ac | 28 31 3c 3c 32 35 29 3a |q%!16)..|(1<<25):|
|00001940| f2 73 65 74 63 0d 0c e4 | 05 e1 0d 0c ee 04 0d 0c |.setc...|........|
|00001950| f8 0f dd f2 73 68 6f 77 | 63 61 72 65 74 0d 0d 02 |....show|caret...|
|00001960| 0d ea 68 25 2c 58 25 2c | 59 25 0d 0d 0c 2d c8 99 |..h%,X%,|Y%...-..|
|00001970| 22 57 69 6d 70 5f 47 65 | 74 43 61 72 65 74 50 6f |"Wimp_Ge|tCaretPo|
|00001980| 73 69 74 69 6f 6e 22 2c | 2c 71 25 3a e7 21 71 25 |sition",|,q%:.!q%|
|00001990| 3c 30 3a ef 37 3a e1 0d | 0d 16 1b 58 25 3d 71 25 |<0:.7:..|...X%=q%|
|000019a0| 21 38 3a 59 25 3d 71 25 | 21 31 32 3a 68 25 3d 21 |!8:Y%=q%|!12:h%=!|
|000019b0| 71 25 0d 0d 20 21 c8 99 | 22 57 69 6d 70 5f 47 65 |q%.. !..|"Wimp_Ge|
|000019c0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 68 25 |tWindowS|tate",h%|
|000019d0| 2c 71 25 0d 0d 2a 11 e7 | 61 75 74 6f 73 63 72 6f |,q%..*..|autoscro|
|000019e0| 6c 6c 25 8c 0d 0d 34 38 | e7 58 25 3c 71 25 21 32 |ll%...48|.X%<q%!2|
|000019f0| 30 84 58 25 3e 71 25 21 | 31 32 2d 71 25 21 34 2b |0.X%>q%!|12-q%!4+|
|00001a00| 71 25 21 32 30 71 25 21 | 32 30 3d 58 25 2d 28 71 |q%!20q%!|20=X%-(q|
|00001a10| 25 21 31 32 2d 71 25 21 | 34 29 81 32 0d 0d 3e 3b |%!12-q%!|4).2..>;|
|00001a20| e7 59 25 3e 71 25 21 32 | 34 2d 33 32 84 59 25 3c |.Y%>q%!2|4-32.Y%<|
|00001a30| 71 25 21 38 2d 71 25 21 | 31 36 2b 71 25 21 32 34 |q%!8-q%!|16+q%!24|
|00001a40| 71 25 21 32 34 3d 59 25 | 2b 28 71 25 21 31 36 2d |q%!24=Y%|+(q%!16-|
|00001a50| 71 25 21 38 29 81 32 0d | 0d 48 05 cd 0d 0d 52 2a |q%!8).2.|.H....R*|
|00001a60| 71 25 21 32 38 3d 2d 31 | 3a c8 99 22 57 69 6d 70 |q%!28=-1|:.."Wimp|
|00001a70| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 32 2c |_SendMes|sage",2,|
|00001a80| 71 25 2c 21 71 25 0d 0d | 5c 19 66 69 6e 64 63 61 |q%,!q%..|\.findca|
|00001a90| 72 65 74 25 3d b9 3a 64 | 65 6c 61 79 25 3d 30 0d |ret%=.:d|elay%=0.|
|00001aa0| 0d 66 05 e1 0d 0d 70 04 | 0d 0d 7a 1c dd f2 66 69 |.f....p.|..z...fi|
|00001ab0| 6e 64 63 61 72 65 74 3a | 66 69 6e 64 63 61 72 65 |ndcaret:|findcare|
|00001ac0| 74 25 3d a3 0d 0d 84 1f | ea 58 25 2c 59 25 2c 78 |t%=.....|.X%,Y%,x|
|00001ad0| 25 2c 79 25 2c 68 25 2c | 49 25 2c 4e 25 2c 54 25 |%,y%,h%,|I%,N%,T%|
|00001ae0| 2c 42 25 0d 0d 8e 2d c8 | 99 22 57 69 6d 70 5f 47 |,B%...-.|."Wimp_G|
|00001af0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00001b00| 2c 2c 71 25 3a e7 21 71 | 25 3c 30 3a ef 37 3a e1 |,,q%:.!q|%<0:.7:.|
|00001b10| 0d 0d 98 14 58 25 3d 71 | 25 21 38 3a 59 25 3d 71 |....X%=q|%!8:Y%=q|
|00001b20| 25 21 31 32 0d 0d a2 28 | 68 25 3d 21 71 25 3a c8 |%!12...(|h%=!q%:.|
|00001b30| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00001b40| 53 74 61 74 65 22 2c 68 | 25 2c 71 25 0d 0d ac 72 |State",h|%,q%...r|
|00001b50| e7 58 25 3c 71 25 21 32 | 30 84 58 25 3e 71 25 21 |.X%<q%!2|0.X%>q%!|
|00001b60| 31 32 2d 71 25 21 34 2b | 71 25 21 32 30 84 59 25 |12-q%!4+|q%!20.Y%|
|00001b70| 3e 71 25 21 32 34 2d 33 | 32 84 59 25 3c 71 25 21 |>q%!24-3|2.Y%<q%!|
|00001b80| 38 2d 71 25 21 31 36 2b | 71 25 21 32 34 3a 58 25 |8-q%!16+|q%!24:X%|
|00001b90| 3d 71 25 21 34 3a 59 25 | 3d 71 25 21 38 3a 8b 3a |=q%!4:Y%|=q%!8:.:|
|00001ba0| 58 25 2b 3d 71 25 21 34 | 2d 71 25 21 32 30 3a 59 |X%+=q%!4|-q%!20:Y|
|00001bb0| 25 2b 3d 71 25 21 31 36 | 2d 71 25 21 32 34 0d 0d |%+=q%!16|-q%!24..|
|00001bc0| b6 0f c8 97 20 78 25 2c | 79 25 2c 49 25 0d 0d c0 |.... x%,|y%,I%...|
|00001bd0| 36 4e 25 3d b6 28 28 58 | 25 2d 78 25 29 2a 28 58 |6N%=.((X|%-x%)*(X|
|00001be0| 25 2d 78 25 29 2b 28 59 | 25 2d 79 25 29 2a 28 59 |%-x%)+(Y|%-y%)*(Y|
|00001bf0| 25 2d 79 25 29 29 2f 33 | 32 3a e7 4e 25 3d 30 4e |%-y%))/3|2:.N%=0N|
|00001c00| 25 3d 31 0d 0d ca 0c e3 | 49 25 3d 31 b8 4e 25 0d |%=1.....|I%=1.N%.|
|00001c10| 0d d4 28 c8 97 b8 78 25 | 2b 28 58 25 2d 78 25 29 |..(...x%|+(X%-x%)|
|00001c20| 2f 4e 25 2a 49 25 2c 79 | 25 2b 28 59 25 2d 79 25 |/N%*I%,y|%+(Y%-y%|
|00001c30| 29 2f 4e 25 2a 49 25 0d | 0d de 1b c8 97 54 25 2c |)/N%*I%.|.....T%,|
|00001c40| 54 25 2c 42 25 3a e7 28 | 42 25 80 31 29 49 25 3d |T%,B%:.(|B%.1)I%=|
|00001c50| 4e 25 0d 0d e8 13 c8 96 | 3a ed 3a c8 97 b8 58 25 |N%......|:.:...X%|
|00001c60| 2c 59 25 3a e1 0d 0d f2 | 05 20 0d 0d fc 0a dd f2 |,Y%:....|. ......|
|00001c70| 68 65 6c 70 0d 0e 06 21 | ea 54 24 3a e7 66 6c 61 |help...!|.T$:.fla|
|00001c80| 73 68 69 6e 67 25 54 24 | 3d 22 66 66 22 3a 8b 54 |shing%T$|="ff":.T|
|00001c90| 24 3d 22 6e 22 0d 0e 10 | cc 54 24 3d 22 54 68 69 |$="n"...|.T$="Thi|
|00001ca0| 73 20 69 73 20 74 68 65 | 20 43 61 72 65 74 20 46 |s is the| Caret F|
|00001cb0| 6c 61 73 68 65 72 20 69 | 63 6f 6e 2e 7c 4d 43 6c |lasher i|con.|MCl|
|00001cc0| 69 63 6b 20 53 45 4c 45 | 43 54 20 74 6f 20 6c 6f |ick SELE|CT to lo|
|00001cd0| 63 61 74 65 20 74 68 65 | 20 63 61 72 65 74 20 6f |cate the| caret o|
|00001ce0| 6e 20 74 68 65 20 44 65 | 73 6b 74 6f 70 7c 4d 43 |n the De|sktop|MC|
|00001cf0| 6c 69 63 6b 20 41 44 4a | 55 53 54 20 74 6f 20 6c |lick ADJ|UST to l|
|00001d00| 6f 63 61 74 65 20 74 68 | 65 20 63 61 72 65 74 20 |ocate th|e caret |
|00001d10| 6d 6f 72 65 20 71 75 69 | 63 6b 6c 79 7c 4d 43 6c |more qui|ckly|MCl|
|00001d20| 69 63 6b 20 4d 45 4e 55 | 20 74 6f 20 74 75 72 6e |ick MENU| to turn|
|00001d30| 20 63 61 72 65 74 20 66 | 6c 61 73 68 69 6e 67 20 | caret f|lashing |
|00001d40| 6f 22 2b 54 24 2b 22 20 | 6f 72 20 71 75 69 74 20 |o"+T$+" |or quit |
|00001d50| 74 68 65 20 61 70 70 6c | 69 63 61 74 69 6f 6e 2e |the appl|ication.|
|00001d60| 22 0d 0e 1a 39 21 71 25 | 3d 28 32 35 2b a9 54 24 |"...9!q%|=(25+.T$|
|00001d70| 29 80 26 46 43 3a 71 25 | 21 31 36 3d 26 35 30 33 |).&FC:q%|!16=&503|
|00001d80| 3a 24 28 71 25 2b 32 30 | 29 3d 54 24 2b bd 30 3a |:$(q%+20|)=T$+.0:|
|00001d90| 71 25 21 31 32 3d 72 65 | 66 25 0d 0e 24 24 c8 99 |q%!12=re|f%..$$..|
|00001da0| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00001db0| 65 22 2c 31 37 2c 71 25 | 2c 74 61 73 6b 25 0d 0e |e",17,q%|,task%..|
|00001dc0| 2e 05 e1 0d ff          |                         |.....   |        |
+--------+-------------------------+-------------------------+--------+--------+